﻿Public Class PedidoPickeadorTiempo
    Dim _PEDCOD, _PICKCOD As String
    Dim _EVECOD As String

    Sub New()

    End Sub

    Sub New(ByVal pedcod As String, ByVal pickcod As String, ByVal evecod As String)
        Me._PEDCOD = pedcod
        Me._PICKCOD = pickcod
        Me._EVECOD = evecod
    End Sub

    Public Property PED_Codigo() As String
        Get
            Return _PEDCOD
        End Get
        Set(ByVal value As String)
            _PEDCOD = value
        End Set
    End Property

    Public Property PICK_Codigo() As String
        Get
            Return _PICKCOD
        End Get
        Set(ByVal value As String)
            _PICKCOD = value
        End Set
    End Property

    Public Property EVE_Codigo() As String
        Get
            Return _EVECOD
        End Get
        Set(ByVal value As String)
            _EVECOD = value
        End Set
    End Property

End Class
